From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 5 Dec 2021 19:53:47 +0000 (+0100)
Subject: Fix fancy-about-screen point placement
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~16^2~4050^2~51
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=b961af66b9e8c4ccc8efee0401231e1a8ff42c77;p=emacs.git

Fix fancy-about-screen point placement

* lisp/startup.el (fancy-about-screen): Make point placement more
resilient (bug#43636).
---

diff --git a/lisp/startup.el b/lisp/startup.el
index 8ea7a5b392d..e5e6b07b4d4 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1989,8 +1989,9 @@ splash screen in another window."
       (setq-local browse-url-browser-function 'eww-browse-url)
       (setq tab-width 22)
       (setq buffer-read-only t)
+      ;; Place point somewhere it doesn't cover a character.
       (goto-char (point-min))
-      (forward-line 3))))
+      (re-search-forward "\n$" nil nil 2))))
 
 (defun fancy-splash-frame ()
   "Return the frame to use for the fancy splash screen.